CAADate_AfterPapalReform_JD <-
function(JD){
.Call("CAADate_AfterPapalReform_JD", JD)
}
